www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\admin\D_chk_edit_pinlun.asp
<% '************************************************************** ' 新动软网站管理系统 ' 官方网站: http://www.aspcpu.com ' 系统作者: 阮丁远(网名:天下程序) ' Copyright 新动软网站管理系统 版权所有 '************************************************************** %> <LINK href="css.css" type=text/css rel=stylesheet> <% dir_set="../" %> <!--#include file=../inc/conn.asp--> <!--#include file=../inc/Functionb.asp--> <!--#include file=../inc/ajaxLIB.asp--> <!--#include file=inc/checkadmin2.asp--> <!--#include file=../inc/functionFiless.asp--> <% AJAXshowLoader() %> <% biao2="[ND_pinlun]" sys_content_type=trim(request("sys_content_type")) lanmu_type=trim(request("lanmu_type")) set rs44g=server.CreateObject("adodb.recordset") rs44g.open "select * from ND_channel where sys_content_type_name='"&sys_content_type&"' and lanmu_type='"&lanmu_type&"'",conn,1,1 if find_dataw(lanmu_type,rs44g("id"),6)<>"1" and qx_if_max=0 then response.redirect "D_suodinguser.asp" end if if session(nd_admin_cach_varb_name)="" then if request.cookies(nd_admin_cach_varb_name)="" then uuuaa="" else uuuaa=request.cookies(nd_admin_cach_varb_name) end if else uuuaa=session(nd_admin_cach_varb_name) end if if sys_content_type="" then %> <script language="javascript"> alert("url参数sys_content_type不能为空"); history.go(-1); </script> <% response.end end if err1=0 if request("Content")="" then err1=1 %> <script language="javascript"> alert("请填写评论内容"); history.go(-1); </script> <% response.end end if if request("uname")="" then err1=1 %> <script language="javascript"> alert("请填写 评论者用户名"); history.go(-1); </script> <% response.end end if if request("fen")="" or isnumeric(request("fen"))=0 then err1=1 %> <script language="javascript"> alert("请填写 用户评分,且必须为数字"); history.go(-1); </script> <% response.end end if if err1=0 then set rs44=server.CreateObject("adodb.recordset") rs44.open "select * from "&biao2&" where id="&request("id")&"",conn,1,3 sass=clng(request("fen")) if clng(request("fen"))>100 then sass=100 if clng(request("fen"))<0 then sass=0 rs44("fen")=sass rs44("content")=Request("Content") rs44("username")=request("uname") rs44.update %> <script language="javascript"> alert("修改成功"); self.location="D_admin_pinlun.asp?sys_content_type=<%=sys_content_type%>&lanmu_type=<%=lanmu_type%>&page=<%=request("pageb")%>"; </script> <% end if %> <% AJAXcloseLoader() %>